home *** CD-ROM | disk | FTP | other *** search
/ Mac Mania 1 / MacMania 1.toast / Games / Mech Zone / Sample Robots / Radar Love ][ < prev    next >
Text File  |  1991-08-30  |  836b  |  39 lines
  1. `  RADAR LOVE.  Simply locks on quickly and fires.  
  2. `  Kicks SITTING DUCKs feathered butt consistently.
  3.  
  4. `  TES  3-21-89
  5.    equip 1 2 0 0 0 300
  6.  
  7.    position 21 2
  8.  
  9. `  Find if enemy is above or below...
  10. 15 swivel 180
  11. 20 debug1 = objectscan 90
  12.    if enemy=0 then goto 15
  13.    if debug1=0 then goto15
  14.  
  15. `  Find the 10 degree arc that the enemy is within...
  16.    debug2 = range
  17.    debug1 = 0-95.468
  18.    swivel debug1
  19. 60 swivel 10
  20.    debug2 = objectscan 5
  21.    if enemy=0 then goto 60
  22.    if debug2=0 then goto 60
  23.  
  24. `  Narrow it down to the exact angle...
  25.     debug3 = 32.6
  26.     george = 0 - 6
  27.     swivel george
  28. 110 swivel 1
  29.     objectscan 0
  30.     if enemy=0 then goto 110
  31.     if range=0 then goto 110
  32.  
  33. `  And nail him with the hard stuff.
  34. 190 launch
  35.     zap
  36.     objectscan 0
  37.     if enemy = 0 then goto 20
  38.     if range = 0  then goto 20
  39.     else goto 190